home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 1 Issue 2 / PDCD-1 - Issue 02.iso / _editors / editors / _stronged / !StrongED / BaseMode < prev    next >
Text File  |  1994-10-24  |  7KB  |  348 lines

  1.  
  2. # Description of the "Base" mode
  3. # This is the mode that lies under any other mode. This file should not be
  4. # renamed. If it is, StrongED will get seriously confused and won't start..
  5. # There shouldn't be any errors in it either..
  6.  
  7. PrintHead    <tmp$path>.<tmp$leaf>|i|i<Sys$Date> <Sys$Time>|m
  8. PrintFoot    |m|i---- <tmp$page> ----
  9.  
  10. Search
  11.     _Indent        {" "|"\t"}
  12.     _MarkWord    {AlphaNum|"_"}+ | {Punct}+
  13.     _MoveWord    {A}+
  14.     _DeleteWord    _MoveWord
  15.     _EndSpc        {" "}+ >
  16.     _spct        {" " | "\t"}+
  17.     _Complete    {" "} ((Upper [{Upper}+ | {Lower}+]) | {Lower}+ ["_"]) | {Punct|Digit}+
  18.     _Wrap        ~NL Any @1 {" "} NL ~ NL|"\t"|" "
  19.  
  20.     me        "Guttorm"|"Armstrong"|("Strong" "ED"|"Help"|"Hlp")
  21.  
  22. End
  23.  
  24. Replace
  25.     _rwrap        @01 " "
  26. End
  27.  
  28. KeyList SearchReplace
  29.     ^A        Select(Advanced)
  30.     ^L        Select(Line)
  31.     ^C        Select(Case)
  32.     ïF4        Select(Old)
  33.     ^N        Select(Count)
  34.     ^S        Select(Scope)
  35.     RETURN        Select(GO)
  36.     PgUp        History(older)
  37.     PgDown        History(newer)
  38.     F1        MenuToWindow HelpString("StrongED.advancedsyntax")
  39. End
  40.  
  41. KeyList LoF_dbox
  42.     ^A        Select(Advanced)
  43.     ^L        Select(Line)
  44.     ^C        Select(Case)
  45.     F2        Select(Old)
  46.     ^D        Select(Display)
  47.     ^S        Select(Search)
  48.     Return        Select(GO)
  49.     PgUp        History(older)
  50.     PgDown        History(newer)
  51. End
  52.  
  53. KeyList Interactive
  54.     ^C        Select(Case)
  55.     F4        Select(Old)
  56.     Down        Select(Next)
  57.     Up        Select(Prev)
  58.     PgUp        Select(Old)
  59.     PgDown        Adjust(Old)
  60. End
  61.  
  62. KeyList SaveBox
  63.     Return        Select(Save)
  64.     ^Q        Select(Kill)
  65.     F3        History(older)
  66.     ïF3        History(older)
  67.     PgUp        History(older)
  68.     PgDown        History(newer)
  69. End
  70.  
  71. KeyList WhatNext
  72.     Down        Select(Next)
  73.     ^N        Select(Next)
  74.     Return        Select(Replace)
  75.     ^R        Select(Replace)
  76.     ^A        Select(All)
  77.     F8        Select(Undo)
  78.     ^F8        Select(Redo)
  79. End
  80.  
  81. KeyList Print
  82.     ^F        Select(HeaderFooter)
  83.     Return        Select(GO)
  84. End
  85.  
  86. #----------------------------------
  87.  
  88. KeyList CopyCursor
  89.     ESC        CopyCursor_Off
  90.     Copy        CopyFromCC
  91.     ïCopy        CopyCursor_Off
  92.     Left        CopyCursor_Left
  93.     Right        CopyCursor_Right
  94.     Up        CopyCursor_Up
  95.     Down        CopyCursor_Down
  96.     ïLeft        CaretLeft
  97.     ïRight        CaretRight
  98.     ïUp        CaretUp
  99.     ïDown        CaretDown
  100.     Return        CopyCursor_Off NewLine
  101. End
  102.  
  103. KeyList TaskWindow
  104.     ^C        BlockCopy
  105.     F7        BlockCopy
  106. #    ïCopy        CopyCursor_On
  107.     Copy        CopyFromCC
  108.     Left        CopyCursor_Left
  109.     Right        CopyCursor_Right
  110.     Up        CopyCursor_Up
  111.     Down        CopyCursor_Down
  112.     PgUp        PageUp
  113.     PgDown        PageDown
  114.     Return        CopyCursor_Off NewLine
  115.     ^Q        KillView
  116.     ^TAB        PassOn
  117.     ïF11        PassOn
  118.     ^F11        PassOn
  119.     ^ïF11        PassOn
  120.     F12        PassOn
  121.     ïF12        PassOn
  122.     ^F12        PassOn
  123.     ^ïF12        PassOn
  124. End
  125.  
  126. KeyList Global
  127.     ^ïF9        dbox_Chars
  128.     ^F1 1        GotoMark (1)
  129.     ^F2 1        GotoMark (2)
  130.     ^F3 1        GotoMark (3)
  131.     ^F4 1        GotoMark (4)
  132.     ïF5 1        GotoBlock_Start
  133.     ïF5 2        GotoBlock_End
  134.     ^ïH        HideAll
  135.     ^L        ListOfWindows
  136.     ^W        Complete(_Complete) ;
  137. #    ^W        WordToBuffer   ; These three are used to copy text to writable fields in dboxes.
  138.     F7        BlockToBuffer  ; They have no meaning if no writable field has caret.
  139.     F8        ClipToBuffer   ;
  140.     F11        CreateText
  141.     ^ïTab        SetDir
  142.     ïUp        NextWindow
  143.     ïDown        PreviousWindow
  144. End
  145.  
  146. KeyList
  147.     ESC        BlockMark_ESC
  148. #    F1        HelpWord
  149.     F2        dbox_ListOfFound
  150.     F3        dbox_SaveText
  151.     F4        dbox_Interactive
  152.     F5        dbox_GotoLine
  153. #    F6        BlockMark_Standard
  154.     F6        BlockMark_Continous
  155.     F7        BlockCopy
  156.     F8        Undo
  157.     F9        Playback
  158.  
  159. #    ïF1        HelpStrongED
  160. #    ïF3        SaveBlock
  161.     ïF4        dbox_Replace
  162. #    ïF5        GotoBlock
  163.     ïF6        BlockClear
  164.     ïF7        BlockMove
  165.     ïF8        BlockDelete
  166.     ïF9        Learn
  167.  
  168.     ^F5        InsertCtrl
  169.     ^F6        MarkText
  170.     ^F7        LoseCaret
  171.     ^F8        Redo
  172.  
  173.     ^F1 1        SetMark(5) GotoMark (1)
  174.     ^F2 1        SetMark(5) GotoMark (2)
  175.     ^F3 1        SetMark(5) GotoMark (3)
  176.     ^F4 1        SetMark(5) GotoMark (4)
  177.     ^F1 2        GotoMark(5)
  178.     ^F2 2        GotoMark(5)
  179.     ^F3 2        GotoMark(5)
  180.     ^F4 2        GotoMark(5)
  181.  
  182.     ^ïF1 1        SetMark (1)
  183.     ^ïF2 1        SetMark (2)
  184.     ^ïF3 1        SetMark (3)
  185.     ^ïF4 1        SetMark (4)
  186.  
  187.     ^ïF1 2        ClearMark (1)
  188.     ^ïF2 2        ClearMark (2)
  189.     ^ïF3 2        ClearMark (3)
  190.     ^ïF4 2        ClearMark (4)
  191.  
  192.     ^A 1        MarkChar
  193.     ^A 2        MarkWord
  194.     ^A 3        MarkLine
  195.     ^A 4        MarkText
  196. #    ^B,^U        UppercaseBlock
  197. #    ^B,^L        LowercaseBlock
  198. #    ^B,^S        SwapcaseBlock
  199.     ^ïB        ToggleIndent
  200.     ^C        BlockCopy
  201. #    ^ïF11        Debug
  202.     ^ïF11        Sort
  203.     ^D,^D        DateAndTime ("%DY.%MN.%YR")
  204.     ^D,^T        DateAndTime ("%24:%MI")
  205.     ^D,^W        DateAndTime ("%WK")
  206.  
  207.     ^F        ListOfWord (Text,Whole,NoLine,NoCase)
  208.     ^ïF        ListOfWord (All,Whole,NoLine,NoCase)
  209.     ^H        HideView
  210. #    ^I        dbox_FileInfo
  211. #    ^I        CharInfo
  212.     ^J        LowercaseChar
  213.     ^N        FindNext
  214.     ^P        PreviousMessage
  215.  
  216.     ^Q        KillView
  217.     ^R        Pop
  218.     ^ïR        PopAll
  219.     ^S        SwapcaseChar
  220.     ^T        ViewToTop
  221. #    ^T        Transpose(-2)
  222.     ^U        UppercaseChar
  223.     ^V        BlockMove
  224. #    ^W        MarkWord
  225. #    ^W 2        MarkLine
  226.     ^W,^C        CreateView
  227.     ^W,^V        SplitViewVert
  228.     ^W,^H        SplitViewHor
  229. #    ^W,^F        FullView
  230.     ^X        BlockDelete
  231.     ^Z        BlockClear
  232.  
  233.     Tab        Tab
  234.     ïTab        ToggleTabLine
  235.     ^Tab        CycleTabkey
  236.     Copy        DeleteRight
  237.     ïCopy        CopyCursor_On
  238.     ^Copy        DeleteLine
  239.     ^ïCopy 1    MarkToEnd_tl
  240.     ^ïCopy 2    BlockDelete
  241.     Print        Print
  242.     ïPrint        dbox_Print
  243.     Delete        DeleteLeft
  244. #    Delete        DeleteRight
  245.     ïDelete        DeleteWordRight
  246.     Backspace    DeleteLeft
  247.     ïBackspace    DeleteWordLeft
  248.     Insert        ToggleInsert
  249.     Home        StartOfText
  250.     Return        NewLine
  251.  
  252.     Left        CaretLeft
  253.     ïLeft        WordLeft
  254.     ^Left 1        StartOfWLine
  255.     ^Left 2        StartOfTLine
  256.     ^ïLeft 1    MarkToStart_tl
  257.     ^ïLeft 2    BlockDelete
  258.  
  259.     Right        CaretRight
  260.     ïRight        WordRight
  261.     ^Right 1    EndOfWLine
  262.     ^Right 2    EndOfTLine
  263.     ^ïRight 1    MarkToEnd_tl
  264.     ^ïRight 2    BlockDelete
  265.  
  266.     Up        CaretUp
  267. #    ïUp        NextWindow
  268.     ^Up        StartOftext
  269.     ^ïUp        LineUp
  270.     Down        CaretDown
  271. #    ïDown        PreviousWindow
  272.     ^Down        EndOfText
  273.     ^ïDown        LineDown
  274.  
  275.     PgUp        PageUp
  276.     PgDown        PageDown
  277.  
  278.     ^ïZ        CB_Purge
  279.     ^ïX        CB_Copy  BlockDelete
  280.     ^ïC        CB_Copy  BlockClear
  281.     ^ïV        CB_Paste
  282.  
  283. End
  284.  
  285. Functions
  286.  
  287.     Key    ïF1
  288.     Icon    help
  289.     Help    Select gives help on StrongED. Adjust looks up word under caret.|MShift-Select gives info on file and Shift-Adjust gives info on char under caret.
  290.     Select    HelpString("StrongED.$")
  291.  
  292.     Key    F1
  293.     Adjust    HelpWord
  294.  
  295.     Key    ^I
  296.     ïSelect    dbox_FileInfo
  297.  
  298.     ïAdjust    CharInfo
  299.  
  300.     Key    ^L
  301.     Icon    Lot
  302.     Help    Select opens/closes the List of Windows window.
  303.     Select    ListOfWindows
  304.  
  305.     Icon    opton
  306.     Help    Select opens/closes the Global Choices window,|Mand Adjust opens/closes the Mode Choices window.
  307.     Select    dbox_GlobalChoices
  308.  
  309.     Adjust    dbox_ModeChoices
  310.  
  311.     Key    ^W,^F
  312.     Select    Fullview
  313.  
  314. #    Menu    Tab to spaces
  315. #    Help    Replaces occurrences of the TAB character with spaces.
  316. #    Select    Untab
  317. #
  318. #    Menu    Spaces to Tab
  319. #    Help    Replaces multiple spaces with TAB characters.|MOnly handles spaces at the start of the line.
  320. #    Select    TabIt
  321.  
  322.     Menu    List me
  323.     Select    ListOfFound (me,Text,Align,NoLine,NoCase)
  324.  
  325.     Menu    Trim lines
  326.     Help    Removes spaces from the end of lines
  327.     Select    Replace (_EndSpc,"",,NoLine)
  328.  
  329.     Menu    Left Adjust
  330.     Help    Removes spaces from the start of each line
  331.     Select    Replace (_spct,"",,Line)
  332.  
  333.     Menu    Wrap
  334.     Help    Join lines together
  335.     Select    Replace (_wrap,_rwrap,,Noline)
  336.  
  337.     Menu    Unwrap
  338.     Help    Split lines
  339.     Select    Unwrap
  340.  
  341. End
  342.  
  343.  
  344. Shortcuts
  345.     $me    Guttorm Vik\n\iMarkesmauet 6B\n\i5016 Bergen\n\iNorway\n\n\iarmstrong@bbb.no
  346.     $test    TEST
  347. End
  348.